home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 7 / PC World Interactive 7.iso / bb2000 / files / BlueMenu.dxr / 00019.ls < prev    next >
Encoding:
Text File  |  1998-02-20  |  523 b   |  21 lines
  1. global gMasterObj
  2.  
  3. on exitFrame
  4.   repeat with i = 2 to 5
  5.     if rollOver(i) then
  6.       cursor([1, 2])
  7.       if the mouseDown then
  8.         set the member of sprite i to member (getName(gMasterObj, i) & "3.PCT")
  9.       else
  10.         set the member of sprite i to member (getName(gMasterObj, i) & "2.PCT")
  11.       end if
  12.       next repeat
  13.     end if
  14.     set the member of sprite i to member (getName(gMasterObj, i) & "1.PCT")
  15.   end repeat
  16.   if (rollOver() < 2) or (rollOver() > 5) then
  17.     cursor(-1)
  18.   end if
  19.   go(the frame)
  20. end
  21.